home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Software Vault: The Gold Collection
/
Software Vault - The Gold Collection (American Databankers) (1993).ISO
/
cdr11
/
pdox693.zip
/
TI482.ASC
< prev
next >
Wrap
Text File
|
1992-09-04
|
1KB
|
67 lines
PRODUCT : Paradox NUMBER : 482
VERSION : All
OS : DOS
DATE : September 4, 1992 PAGE : 1/1
TITLE : Illustration of the MATCH() Function
This Technical Information sheet illustrates one possible use of
the PAL MATCH() function. The script example below shows how to
use the MATCH() function to determine how many minutes have
elapsed between the start time and the end time. The example
assumes that military time is being used.
;TIME.SC
ECHO NORMAL
EDIT "tbl" ; Tbl is the table being used
SCAN
x=MATCH([Start Time], "..:..:..", sh, sm, ss)
y=MATCH([End Time], "..:..:..", eh, em, es)
IF (x and y)
THEN startsec = NUMVAL(sh)*3600 + NUMVAL(sm)*60 + NUMVAL(ss)
endsec = NUMVAL(eh)*3600 + NUMVAL(em)*60 + NUMVAL(es)
[Length of Call] = ROUND((endsec-startsec)/60,0)
ENDIF
ENDSCAN
For additional information on PAL, refer to the PAL Reference
Guide (for versions earlier than 4.0, refer to the PAL User's
Guide).
DISCLAIMER: You have the right to use this technical information
subject to the terms of the No-Nonsense License Statement that
you received with the Borland product to which this information
pertains.